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ADIS SRC 


A015 SYSTEM EXERCISER TEST 

.TITLE; AU15 SYSTEM EXERCISER TEST 
/COPYRIGHT MARCH 19, 1972 
/REV, C, REVISED APRIL 21, 1972 

/DIGITAL EQUIPMENT CORPORATION MAYNARD, MASS, 01754 
/PROGRAMMER! EARL Li BOUSE 
/ 

/THIS PROGRAM IS UESIGNED TO EXERCISE THE 'LOGIC' OF 

/ANALOG TO digital converter, conversions are TAKEN 

/CONTROL, SEQUENTIAL AND RANDOM OPERATION, EIGHT (3) 


THE "AD15" 
UNDER program 
POSSIBLE 


/ERRORS MAY BE DETECTED BY THE 'ADIS' SYSTEM EXERCISER, 

/ 

ILLEGAL 1WORP COUNT' ELAG 
ILLEGAL 'MEMORY OVERFLOW' 

WRONG 'CHANNEL' IN 'AD15' 


/l)i 
/2 ) ! 

/ 3 ) i 
/4J| 

/ 5 J ) 

/ 6 ) J 

/7 ) ; 
/ID) I 
/ID i 


OCCURRED, 
flag OCCURRED, 

STATUS REGISTER, 

CONTENTS OF 'W,q,#26' NOT EQUAL TO '0' AFTER W.C, FLAG, 

CONTENTS OF ^DATA BUFFER' UNCHANGED AFTER SEQUENTIAL CONVERSIONS 
ILLEGAL OATA TRANSFER TO DATA BUFFER, 

DATA ERROR, CONVERSION VALUES OUT OF SPEC IN NOISE TEST, 

ILLEGAL 'API' ERROR, 

ADD TO MEMORY FAILED 


o 






.ebrel 




705512 

A 

RRl n = 705512 





707764 

A 

EBA=707764 


o 



707702 

A 

EEM=707702 







/ 



00000 

R 

600017 

A 

US£RSW 

600017 

/I/O DEVICE WITH API CHANNEL '57', 

o 

00001 

R 

000000 

A 


0 


00002 

R 

000000 

A 


0 



00003 

R 

000000 

A 


0 


o 

00004 

R 

000074 

R 


i PSA SERVCE 


00005 

R 

000044 

R 


* DS A I N I T 



00006 

R 

010461 

A 


* S I XBT ’AD15 » 



00007 

R 

654040 

A 




0 

00010 

R 

010000 

A 

PATASW 

10000 

/data sws inhibits THE ADIS TEST 


00011 

R 


A 


iBPOCK 7 


o 

00020 

R 

000000 

A 

SYSERR 

0 

/ERROR INDICATOR FOR MONITOR 

00021 

R 

000000 

A 


0 

/W,C, FOR DATA WORD ERROR CODES 


00022 

R 

000000 

A 

ERCQDE 

0 

/ERROR CODE 

o 

00023 

R 

000000 

A 


0 


00024 

R 

000000 

A 


0 



00025 

R 

000000 

A 


0 



00026 

R 

000000 

A 


0 


o 

00027 

R 

000000 

A 


0 


o 

00030 

R 

000000 

A 

/APIS 

0 

JOT'S 


00031 

R 

701304 

A 

ADQV 

701304 

/LOAD STATUS, ClR A/O DONE, INITIATE TIMING 


00032 

R 

701312 

A 

ADRB 

701312 

/READ DATA INTO AC, CLR A/D DONE 


00033 

R 

701352 

A 

ADRS 

701352 

/READ STATUS REGISTER INTO AC 

o 

00034 

R 

701362 

A 

ADPF 

701362 

/CLEAR ALL A/D FALGS 


00035 

R 

701301 

A 

ADSF 

701301 

/SKIP ON A/D DONE FLAG 


00036 

R 

701341 

A 

NCSF 

701341 

/SKIP ON WORD COUNT OVERFLOW 

o 

00037 

R 

701321 

A 

MSSF 

701321 

/SKIP ON MEMORY OVERFLOW 


00040 

R 

000024 

A 

WC24 

24 

/ = TQ W,C, 24 


O 


O 

O 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o 
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ADIS 

SRC 

AP15 SYSTEM 

EXERCISER TEST 



o 

00041 

R 

000025 

A 

CA25 25 


/ = TQ CURRENT ADDRESS 25 

o 


00042 

R 

000026 

A 

WC26 26 


/ = TQ W,C, 26 



00043 

R 

000027 

A 

CA27 27 


/ = TO CURRENT ADDRESS 27 


o 





/INITILI2E THE 

»AP15» TEST 


o 


00044 

R 

000000 

A 

I N ! T 0 




o 

00045 

R 

707764 

A 

EBA 



o 


00046 

R 

707702 

A 

EEM 





00047 

R 

200044 

R 

LAC 

JNIT 



o 

00050 

R 

040074 

R 

PAC 

SERVCE 


o 


00051 

R 

140020 

R 

P2M 

syserh 

/CLEAR ERROR LOCATIONS 



00052 

R 

140021 

R 

PHM 

SYSERR*! 



o 

00053 

R 

140022 

R 

D2M 

ERCOPE 


o 


00054 

R 

141212 

R 

DZM 

FLGDRV 

/CLEAR 'FLAG DRIVE' INDICATOR, 



00055 

R 

760000 

A 

LAW 




o 

00056 

R 

041222 

R 

DAC 

runctr 

/SET UP FOR 8192 PASSES, 

0 


00057 

R 

201227 

R 

LAC 

(PGCVRT 




00060 

R 

040102 

R 

DAC 

DSTSWi 

/SET DISTRIBUTION SWITCH 


o 

00061 

R 

201230 

R 

LAC 

(i 


o 


00062 

R 

041207 

R 

DAC 

CHANEL, 

/= TO CHANNEL #1 



00063 

R 

100610 

R 

JMS 

holdsR 

/CHECK FOR HOLD SWITCH 


0 

00064 

R 

201231 

R 

LAC 

(200001 

/GAIN=2, prog, control, CHA, #1 

o 


00065 

R 

040625 

R 

DAC 

stawrp 




00066 

R 

400031 

R 

XCT 

APCV 

/START 1ST CONVERSION 


o 

00067 

R 

141223 

R 

D2M 

cntra 


O 


00070 

R 

141226 

R 

P3M 

DELAYS 




00071 

R 

7 77770 

A 

LAW 

»10 



o 

00072 

R 

041225 

R 

DAC 

STALCT 

/INITIALIZE STALL COUNTER 

O 


00073 

R 

620044 

R 


.IN IT • 








/SERVCE ROUTINE 

FQR THE *AD15» 

TEST 

o 


00074 

R 

000000 

A 

SERVCE 0 




o 

00075 

R 

707764 

A 

EBA 



o 


00076 

R 

707702 

A 

EEM 





00077 

R 

041210 

R 

DAC 

SAVEAC 

/SAVE CONTENTS OF THE AC 


o 

00100 

R 

141212 

R 

DHM 

flgdRv 

/CLEAR * FLAG DRIVEN' INDICATOR, 

o 


00101 

R 

620102 

R 

JMP* 

pstswi 




00102 

R 

000000 

A 

PSTSW1 0 


/DISTRIBUTION LOCATION FOR TESTS 


o 





/ 



o 






/enter here after COMPLETING a 
/ 

' program control' conversation 


o 

00103 

R 

400035 

R 

RGCVRT XCT 

APSF 

/IS 'A/D DONE' FLAG SET? 

o 


00104 

R 

600147 

R 

JMP 

exit 

/NO, EXIT 



00105 

R 

441223 

R 

I S2 

CNTRA 

/INCREMENT THE LOOP CNTR, 


o 

00106 

R 

740000 

A 

NOP 



o 


00107 

R 

777777 

A 

LAW 

■«1 

/yes 



00110 

R 

041212 

R 

DAC 

FLGDRV 

/SET t FLAG DRIVEN? INDICATOR 


o 

00111 

R 

100560 

R 

JMS 

CKWCSF 

/CHECK FOR AN ILLEGAL W,C, FLAG, 

o 


00112 

R 

100567 

R 

JMS 

CKMSSF 

/CHECK FOR AN ILLEGAL MEM, OFLO FLAG, 



00113 

R 

400033 

R 

XCT 

APRS 

/READ 'ADIS' STATUS REGISTER 


o 

00114 

R 

501232 

R 

AND 

(177 

/mask out channel 

o 


/ 

o o 


o 


o 



o 


o 

PAGE a ADIS? 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


SRC AD15 SYSTEM EXERCISER TEST 

.EJECT 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 



o 


o 
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o 

00115 

R 

541207 

R 


SAD 

CHANEL 

/COKRECT CHANNEL? 


00116 

R 

600121 

R 


JMP 

i +3 

/yes, continue 


00117 

R 

100467 

R 


JMS 

errmes 

/NO, WRONG CHANNEL IN STATUS REG 

o 

00120 

R 

000003 

A 


3 


/ERROR CODE #3 


00121 

R 

400034 

R 


• XCT 

ADCF 

/CLEAR ALL * A/0 * FLAGS 


00122 

R 

201233 

R 


LAC 

(SEQTST 


o 

00123 

R 

040102 

R 


DAC 

psfswi 

/SET UP TO TEST ’SEQUENTIAL' MODE 


00124 

R 

160040 

R 


DZM* 

WC24 



00125 

R 

777601 

A 


LAW 

*177 


o 

00126 

R 

060042 

R 


DAC* 

WC26 

/ ' 3.27 ' CONVERSIONS 


00127 

R 

777600 

A 


LAW 

*200 



00130 

R 

041214 

R 


DAC 

CNTR1 


O ■ 

00131 

R 

201234 

R 


LAC 

(DATA8UF«1 



00132 

R 

060043 

R 


DAC* 

CA27 

/DATA BUFFER ADDRESS*! 


00133 

R 

201235 

R 


LAC 

(DATABUF 


o 

00134 

R 

041215 

R 


DAC 

TEMPI 



00135 

R 

201236 

R 


LAC 

(377777 



00136 

R 

061215 

R 


DAC* 

tempi' ' 

/PRE-LOAD DATA BUFFER 

o 

00137 

R 

441215 

R 


IS? 

TEMPI 



00140 

R 

44l2i4 

R 


ISZ 

QNTR1 



00141 

R 

600136 

R 


JMP 

t*3 


o 

00142 

R 

10063.0 

R 


JMS 

HOLDS W 

/CHECK FOR HOLD SWITCH 


00143 

R 

201237 

R 


LAC 

(402200 

/ G A I N s 4 , multi cycle. seq m cha, 


00144 

R 

400031 

R 


XCT 

ADCV 

/start CONVERSION 

o 

00145 

R 

201232 

R 


LAC 

(177 



00146 

R 

041207 

R 


DAC 

CHANEL 

/=Tq CHA, 128 


00147 

R 

201212 

R 

EXIT 

LAC 

FLGDRV 


o 

00150 

R 

741200 

A 


SNA 


/any 'A/D' FLAGS SET? 


00151 

R 

600520 

R 


JMP 

NOFLAG 

/NO. EXIT MINUS '5' 


00152 

R 

705512 

A 


RPL 


/YES 

o 

00153 

R 

751100 

A 


SPAJCLA 


/IS i API * ON? 


00154 

R 

201210 

R 


LAC 

SAYEAC 

/yes, restore THE Ac, 


00155 

R 

703344 

A 


DBR 


/NO, EXIT 

o 

00156 

R 

620074 

R 


JMP* 

SERVCE 



/ 

/enter HERE AFTER TAKING ALL 'SEQUENTIAL' CONVERSIONS, 


O 





/ 




00157 

R 

100567 

R 

SEQTST JMS 

CKMSSF 

/CHECK FOR AN ILLEGAL MEM, FLAG, 


00160 

R 

400036 

R 

XCT 

WCSF 

/W,C, OVRFLOW FLAG SET, 

O 

00161 

R 

600147 

R 

JMP 

EXIT 

/NO, EXIT 


00162 

R 

777777 

A 

LAW 

*1 

/YES 


00163 

R 

041212 

R 

DAC 

FLGDRV 

/SET 'FLAG DRIVE' INDICATOR 

o 

00164 

R 

400034 

R 

XCT 

ADCF 

/CLEAR ALL A/D FLAGS 


00165 

R 

220042 

R 

LAC* 

WC26 



00166 

R 

741200 

A 

SNA 


/IS w,C, #26 = '0' 

o 

00167 

R 

600172 

R 

JMP 

t + 3 

/YES 


00170 

R 

100467 

R 

JMS 

ERRMES 

/W.C, 26 ISN'T '0' 


00171 

R 

000004 

A 

4 


/ERROR CODE » 4 

o 

00172 

R 

400033 

R 

XCT 

APRS 



00173 

R 

501232 

R 

AND 

(177 

/MASK CHANNEL 


00174 

R 

541232 

R 

SAD 

(177 

/channel correct? 

o 

00175 

R 

600200 

R 

JMP 

, *3 

/YES, CONTINUE 


00176 

R 

100467 

R 

JMS 

ERRMES 

/NO. WRONG CHANNEL IN STATUS REG 


O 


o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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O 00177 R 000003 A 3 /ERROR CODE #3 O 

.EJECT 
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AD15 

SRC 

AQ15 SYSTEM 

EXERCISER TEST 


o 

00200 

R 

200765 

R 

LAC 

DATABUF 



00201 

R 

541236 

R 

SAD 

(3777/7 


o 

00202 

R 

741000 

A 

SKP 



00203 

R 

600206 

R 

JMP 

,+3 



00204 

R 

100467 

R 

JMS 

EHRMES 

/DATA BUFFER UNCHANGED 


00205 

R 

000005 

A 

5 


/ERROR CODE #5 

o 

00206 

R 

201163 

R 

LAC 

DATABUP+176 



00207 

R 

541236 

R 

SAD 

(3777/7 

/WAS THE LAST BUFFER CHANGED? 


00210 

R 

741000 

A 

SKP 


/NO , ERROR 

o 

002U 

R 

600214 

R 

JMP 

i*3 

/yes, CONTINUE 


00212 

R 

100467 

R 

JMS 

errmes 

/data buffer unchanged 


00213 

R 

000005 

A 

5 


/ERROR CODE #5 

o 

00214 

R 

201164 

R 

LAC 

DATABUF + 17 7 



00215 

R 

541236 

R 

sad 

(377777 

/CHECK FOR AN EXTRA CONVERSION 


00216 

R 

600221 

R 

JMP 

i +3 


o 

00217 

R 

100467 

R 

JMS 

ERRMES 

/ERROR LAST DATA bUFFER+1 MODIFIED 


00220 

R 

000006 

A 

6 


/ERROR COPE #6 

o 

00221 

R 

740000 

A 

NOP 


/TEST LOCATION FOR ' D B K f 

00222 

R 

201240 

R 

LAC 

(RANTST 



00223 

R 

040102 

R 

DAC 

DSTSWl 

/SET UP FOR 1 RANDOM i MODE 

o 

00224 

R 

201241 

R 

LAC 

(STAWRD 


00225 

R 

041215 

R 

DAC 

TEMPI 

/ = TO STATUS WORr) BUFFER, 


00226 

R 

201242 

R 

LAC 

(002000 

/GAJNisl, MULTICYCLE, RAN,, CHA #0 

o 

00227 

R 

100576 

R 

JMS 

SETSTA 

/SET UP '10' STAWRD ' S 

00230 

R 

201243 

R 

LAC 

(202001 

/CHA n 


00231 

R 

100576 

R 

JMS 

SETSTA 



00232 

R 

201244 

R 

LAC 

(402002 

/CHA #2 

o 

00233 

R 

100576 

R 

JMS 

SETSTA 



00234 

R 

201245 

R 

LAC 

(602003 

/CHA #3 


00235 

R 

100576 

R 

JMS 

SETSTA 


o 

00236 

R 

201246 

R 

LAC 

(602420 

/CHA #20 


00237 

R 

100576 

R 

JMS 

SETSTA 



00240 

R 

201247 

R 

LAC 

('402007 

/ = TQ CHA, It 7 

o 

00241 

R 

100576 

R 

JMS 

SETSTA 



00242 

R 

201250 

R 

LAC 

(102077 

/=TP CHA, #77 


00243 

R 

1005/6 

R 

JMS 

SETSTA 

o 

00244 

R 

201251 

R 

LAC 

(602005 

/=TQ CHA, AS 


00245 

R 

1005/6 

R 

JMS 

SETSTA 


00246 

R 

201252 

R 

LAC 

(002010 


o 

00247 

R 

061215 

R 

DAC* 

TEMPI 

/=TO THE LAST STATUS WORD, #81 

00250 

R 

777656 

A 

LAW 

*122 



00251 

R 

060040 

R 

DAC# 

WC24 

/SET UP FOR 81 CONVERSIONS 

o 

00252 

R 

201253 

R 

LAC 

(STAWKP-I 


00253 

R 

060041 

R 

DAC# 

CA25 

/STATUS WORD ADDRESS"! 


00254 

R 

777657 

A 

LAW 

*121 


o 

00255 

R 

060042 

R 

DAC# 

WC26 


00256 

R 

201234 

R 

LAC 

(PATAQUF*! 

/DATA BUFFER ADDRESS t! 


00257 

R 

060043 

R 

DAC# 

CA27 


o 

00260 

R 

201254 

R 

LAC 

(10 



00261 

R 

041207 

R 

DAC 

CHANEL 

/=TU CHANNEL #10 


00262 

R 

100610 

R 

JMS 

HOLQSW 

/CHECK FOR HOLD SWITCH 

o 

00263 

R 

200625 

R 

LAC 

STAWRD 



00264 

R 

400031 

R 

XCT 

ADC V 

/start 'Random* conversions 


o 


o 

o 


o 

o 

o 

o 

O 

o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 

o 


o 


o 



G 



o 

o 
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o 

00265 R 600147 R 

JMP EXIT 

.EJECT 

o 

o 



o 

o 



o 

o 



o 

o 



o 

o 



o 

o 



o 

o 



o 

o 



0 

o 



o 

o 



o 

o 



o 

o 



o 
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o 

0 



0 

o 
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o 
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o 
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o 
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o 



00266 

R 

100567 

R 

o 

00267 

R 

400036 

R 


00270 

R 

600147 

R 


00271 

R 

777777 

A 

o 

00272 

R 

041212 

R 


00273 

R 

400034 

R 

o 

00274 

R 

400033 

R 

00273 

R 

501232 

R 


00276 

R 

541207 

R 

o 

00277 

R 

600302 

R 

00300 

R 

100467 

R 


00301 

R 

000003 

A 


00302 

R 

740000 

A 

o 

00303 

R 

201255 

R 


00304 

R 

040102 

R 


00303 

R 

140765 

R 

o 

00306 

R 

140766 

R 


00307 

R 

140767 

R 

o 

00310 

R 

140770 

R 

00311 

R 

140771 

R 


00312 

R 

201236 

R 

o 

00313 

R 

040772 

R 

00314 

R 

040773 

R 


00315 

R 

040774 

R 


00316 

R 

201256 

R 

o 

00317 

R 

040625 

R 


00320 

R 

040626 

R 

o 

00321 

R 

040627 

R 

00322 

R 

040630 

R 


00323 

R 

040631 

R 


00324 

R 

040632 

R 

o 

00325 

R 

040633 

R 


00326 

R 

040634 

R 


00327 

R 

777767 

A 

o 

00330 

R 

060040 

R 


00331 

R 

201253 

R 


00332 

R 

060041 

R 

o 

00333 

R 

777770 

A 


00334 

R 

060042 

R 


00333 

R 

201234 

R 

o 

00336 

R 

060043 

R 


00337 

R 

201230 

R 


00340 

R 

041207 

100610 

R 

o 

00341 

R 

R 

00342 

R 

200625 

R 


00343 

R 

400031 

R 

o 

00344 

R 

600147 

R 


c 

o 


AD3.5 SYSTEM EXERCISER TEST 

/ENTER HERE AFTER TAKING AIL ' 
/ 

RANTST JMS CKMSSF 

XCT WCSF 

JMP EXIT 

LAW *1 

DAC FLG1JKV 

XCT ADCF 

XCT APRS 

AND U77 

SAD CHANEL 

JMP 1*3 

JMS ERRMES 

3 

NOP 

LAC (ADDMEM 

DAC PSTSW1 

DEM DATABUF 

DEM OATABUF+1 

DEM OATABUF+2 

DEM DATABUF*3 

DEM DATABUF + 4 

LAC (377777 

DAC DATABUF+5 

DAC UATABUF+6 

DAC DATABUF*? 

LAC (006401 

DAC STAWRD 

DAC STAWRD*! 

DAC ST AWRD + 2 

DAC STAWRD+3 

OAC SfAWRD*4 

DAC STAWRU+5 

DAC STAHRD*6 

DAC STAWRU+7 

LAW *11 

DAC» WC24 

. LAC (STAWRD-1 

DAC« CA25 

LAW *10 

DAC® WC26 

LAC (DATABUF*! 

DAC® CA27 

LAC (1 

OAC CHANEL 

JMS HDLDSW 

LAC STAWRD 

XCT AUCV 

JMP EXIT 

.EJECT 


c 


' CONVERSIONS 


/CHECK FOR AN ILLEGAL MEM, FLAG, 
/W,C, QVKFLQW FLAG SET? 

/NO, EXIT 

/SET 'FLAG DRIVE' INDICATOR 
/CLEAR ALL A/D FLAGS 
/READ ' AD15 ' STATUS REGISTER 
/MASK OUT CHANNEL 
/CHANNEL RIGHT 
/yes 

/WRUNG CHANNEL IN STATUS 

/ERROR CODE It 3 

/TEST LOCATION FOR ' DBK ' 

/SET UP FOR THE ADD TO MEM, TEST, 
/PRE*LOAD DATA BUFFER 


/GAINs!, MEM, ovrflqw, ADD TO MEM, 


/SET UP FOR '8' CONVERSIONS, 


/sTO CHANNEL #1 
/CHECK FOR HOLD SWITCH 

/START ADD TO MEM, TEST, 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 



o 


o 


o 
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o 





/ENTER 

HERE FOR 

THE ’ADD TO 

MEMORY' TEST 


00345 

R 

100560 

R 

ADPMEM 

JMS 

CKWCSF 

/CHECK FOR AN ILLEGAL W , C , FLAG, 

o 

00346 

R 

400037 

R 


XCT 

MSSF 

/MEM, OVRFLQW FLAG SET? 

00347 

R 

600147 

R 


JMP 

EXIT 



00350 

R 

777777 

A 


LAW 

"i 



00351 

R 

041212 

R 


DAC 

FLGDRV 


o 

00352 

R 

400034 

R 


XCT 

ADCF 

/CLEAR ALL * A/D T FLAGS, 


00353 

R 

400037 

R 


XCT 

MSSF 

/DIO THE MEM, QVRFLOW FLAG CLEAR? 


00354 

R 

600357 

R 


JMP 

* + 3 

/YES, CONTINUE 

o 

00355 

R 

100467 

R 


JMS 

ERRMES 

/NO, ADCF DIDN'T CLEAR MEM, FLAG, 


00356 

R 

000012 

A 


12 


/ERROR CODE #12 


00357 

R 

400032 

R 


XCT 

ADRB 

/read data buffer 

o 

00360 

R 

341236 

R 


TAD 

{677777 

/add constant 


00361 

R 

540772 

R 


SAD 

OATABUF+5 

/IS RESULT = TO DATA BUFFER? 


00362 

R 

600365 

R 


JMP 

,+3 

/YES 

o 

00363 

R 

10046/ 

R 


JMS 

ERRMES 

/NO, ADD TO MEM, FAILED 


00364 

R 

000011 

A 


u 


/ERROR CODE #11 

o 

00365 

R 

201257 

R 


LAC 

(NOISE 


00366 

R 

040102 

R 


DAC 

DSTSW1 

/SET UP FOR NOISE TEST 


00367 

R 

777634 

A 


LAW 

*144 



00370 

R 

041214 

R 


DAC 

CNTR1 

/SET UP ’100' CONVERSIONS 

o 

00371 

R 

201235 

R 


LAC 

(DATABUF 



00372 

R 

041215 

R 


DAC 

TEMPI 



00373 

R 

100610 

R 


JMS 

HOLDSW 

/check for hold switch 

o 

00374 

R 

201230 

R 

RANI 

LAC 

(000001 

/GAIN=;W PROG CONTROL, CHA, #1 


00375 

R 

400031 

R 


XCT 

ADC V 

/START CONVERSION 


00376 

R 

600147 

R 


JMP 

exit 


o 





/ENTER 

HERE FOR 

'NOISE' TEST 



00377 

R 

100560 

R 

noise; 

JMS 

CKWCSF 

/CHECK FOR W,C, FLAG, 


00400 

R 

100567 

R 

JMS 

CKMSSF 

/CHECK FOR MEM, FLAG 

o 

00401 

R 

400035 

R 


XCT 

ADSF 

/DONE FLAG SET? 


00402 

R 

600147 

R 


JMP 

EXIT 

/NO, EXIT 


00403 

R 

777777 

A 


LAW 

*1 

/YES 

o 

00404 

R 

041212 

R 


DAC 

flgqrv 

/SET FLAG DRIVE INDICATOR 


00405 

R 

400034 

R 


XCT 

adcf 

/CLEAR ALL A/D FLAGS 


00406 

R 

400032 

R 


XCT 

aprb 

/read data buffer 

o 

00407 

R 

061215 

R 


DAC* 

TEMPI 

/save it 


00410 

R 

441215 

R 


IS? 

TEMPI 



00411 

R 

441214 

R 


IS2 

Cf\ITRl 

/FINISHED I 100 ' CONVERSIONS? 

o 

00412 

R 

600374 

R 


JMP 

RANI 

/NO, START NEXT CONVERSION 

00413 

R 

740000 

A 


NOP 


/TEST LOCATION FOR »0BK' 


00414 

R 

201235 

R 


LAC 

(DATABUF 


o 

00415 

R 

041215 

R 


DAC 

TEMPI 


00416 

R 

777634 

A 


LAW 

*144 



00417 

R 

041214 

R 


DAC 

CNTR1 


o 

00420 

R 

200765 

R 


LAC 

DATABUF 


00421 

R 

341260 

R 


TAP 

(5 

/ADD * 5 1 TO 1ST CONVERSION VALUE 


00422 

R 

740001 

A 


CM A 


o 

0 

00423 

R 

341230 

R 


TAD 

U 


00424 

R 

041216 

R 


DAC 

TEMP2 

/SAVE ITS COMPLIMENT 


00425 

R 

200765 

R 


LAC 

DATABUF 


o 

00426 

R 

341261 

R 


TAD 

( *5 

/ADD ’ *5 ’ TO 1ST CONVERSION VALUE 


00427 

R 

740001 

A 


CMA 




O 


O 

O 

O 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


PAGE 
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AD15 

SRC 

AD15 SYSTEM 

EXERCISER 

00430 

R 

341230 

R 


TAD 

a 

00431 

R 

041217 

R 


DAC 

TEMP3 

00432 

R 

201216 

R 

NQJSE1 

LAC 

TEMP2 

00433 

R 

361215 

R 


TAP# 

TEMPI 

00434 

R 

740100 

A 


SMA 

00435 

R 

100542 

R 


JMS 

ERROR/ 

00436 

R 

201217 

R 


LAC 

TEMP3 ' 

00437 

R 

361215 

R 


TAD# 

TEMPI 

00440 

R 

741300 

A 


SHAJSPA 


00441 

R 

100542 

R 


j MS 

ERROR/ 

00442 

R 

441215 

R 


ISH 

TEMPI ' 

00443 

R 

441214 

R 


jSH 

CNTR1 

00444 

R 

600432 

R 


JMP 

NOISE1 

00445 

R 

201262 

R 

N0I5E2 

LAC 

{ t *2 

00446 

R 

040102 

R 

DAC 

PSTSW1 

00447 

R 

101172 

R 


JMS 

STALL" 

00450 

R 

201227 

R 


LAC 

(PGCVRT 

00451 

R 

040102 

R 


DAC 

DSTSWl 

00452 

R 

441222 

R 


ISZ 

RUNCTR 

00453 

R 

741000 

A 


SKP 


00454 

R 

600463 

R 


JMP 

EXJTM4 

00455 

R 

100610 

R 


JMS 

HQLDSW 

00456 

R 

201263 

R 


LAC 

(400610 

00457 

R 

400031 

R 


XCT 

ADC V 

00460 

R 

201254 

R 


LAC 

(10 

00461 

R 

041207 

R 


DAC 

CHANEL 

00462 

R 

600147 

R 


JMP 

EXJT 

00463 

R 

777774 

A 

EXITM4 

LAW 

= 4 

00464 

R 

040020 

R 


DAC 

SY5ERK 

00465 

R 

140021 

R 


OHM 

SYSERR+1 

00466 

R 

600147 

R 

/ERROR 

JMP 

/ 

EXIT FOR 
/ 

0 

EXIT 

errors #1, 

00467 

R 

000000 

A 

ERRMES 


004/0 

R 

041211 

R 


DAC 

savacc 

00471 

R 

220467 

R 


LAC# 

ERRMES 

00472 

R 

040022 

R 


DAC 

ERCOPE 

00473 

R 

201264 

R 


LAC 

( NO I SE2 

00474 

R 

040102 

R 


DAC 

DSTSWl 

00475 

R 

777777 

A 


LAW 

•«i 

00476 

R 

040020 

R 


DAC 

SYSERR 

00477 

R 

777772 

A 


LAW 

n6 

00500 

R 

040021 

R 


DAC 

ERCOPE^l 

00501 

R 

201211 

R 


LAC 

SAVACC 

00502 

R 

040023 

R 


DAC 

ERCOPE + 1 

00503 

R 

400033 

R 


XCT 

APRS 

00504 

R 

040024 

R 


DAC 

ERCOPE+2 

00505 

R 

201207 

R 


LAC 

CHANEL 

00506 

R 

040025 

R 


DAC 

ERCODE+3 

00507 

R 

220040 

R 


LAC# 

WC24 

00510 

R 

040026 

R 


DAC 

ERCODE+4 

00511 

R 

220042 

R 


LAC# 

WC26 


TEST 


/SAVE ITS compliment 


/IS VALUE less than high limit 
/no* CONVERSION out of spec 


/IS VALUE GREATER THAN LOW LIMIT 
/NO, VA[.UE OUT OF SPEC 

/CHECKED ALL VALUES? 

/NO, COMPARE NEXT CONVERSION 

/initialize stall 


/SET .DISTRIBUTION SWITCH FOR P,C, TEST 
/FINISHED TEST? 

/NO, LOOP AGAIN 

/yes, type done, 

/CHECK FOR HOLD SWITCH 

/GAJN=4, PROG CONTROL, ADD TO MEM,, CHA 
/START NEXT CONVERSION 

/ = TO CHANNEL '10' 


/SET UP TO TYPE 'DONE' 


#2, iti, #4, #5, AND #6 


/SAVE CONTENTS OF AC 

/nii error code 

/reset distribution switch, 

/SET ERROR INDICATOR 
/6 DATA WORDS 


/#2, 

CONTENTS 

of AC 

/#?, 

'ADIS' STATUS REG 

/#*, 

CURRENT 

channel 

/#5, 

CONTENTS 

OF W,C, 

/#6, 

contents 

OF W,C, #26 



G 


o 

o 

o 

o 

o 


o 


o 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

G 

o 

o 
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AD15 SRC 


AD15 SYSTEM EXERCISER TEST 


00512 R 040027 R 

00513 R 400034 R 

00514 R 600152 R 


0 AC 
XCT 
JMP 
/ 

, EJECT 


ERCODE+5 

ADCF 

EXJT+J 


/CLEAR all a/p flags, 


o 

o 

o 

o 

o 

o 

o 

o 

o 

G 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 


G 


o 


o 


u 


o 


O 
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AP15 

SRC 

AD15 SYSTEM 

exerciser test 



o 





/SET UP FOR A " 

«5" EXIT 


O 

o 

00515 

R 

777773 

A 

EXJTM5 UAW 

*5 


o 

00516 

R 

040020 

R 

DAC 

5YSERR 



00517 

R 

600152 

R 

UMP 

EXIT + 3 



o 

00520 

R 

705512 

A 

y 

/EXIT FOR A ’ NO 
/ 

NOFUG RPL 

-FUG’ CONDITION 

/test For ! ap i ' 

o 

O 

O ' 

00521 

R 

741100 

A 

SPA 


/IS » A P I ’ ON? 


00522 

R 

100526 

R 

JMS 

ERRORS 

/YES, 'API' ERROR 



00523 

R 

777777 

A 

CAW 


/NO 


o 

00524 

R 

703344 

A 

D8R 



o 


00525 

R 

620074 

R 

JMP# 

/ 

/ERROR #8, API 
/ 

ERRORS 0 

SERVCE 

/NORHAl EXIT 


o 





INTERRUPTED WITH 

NO FUGS SET 

o 

o 

00526 

R 

000000 

A 



o 

00527 

R 

777776 

A 

LAW 


/SET UP ERROR S 


00530 

R 

040020 

R 

DAC 

SYSERR 



o 

00531 

R 

201254 

R 

LAC 

(10 

/ERROR CODE, 'API! ERROR 

o 

00532 

R 

040022 

R 

DAC 

ercqpe 


00533 

R 

400033 

R 

XCT 

APRS 



o 

00534 

R 

040023 

R 

PAG 

ERCODE+1 



00535 

R 

201223 

R 

LAG 

GNTRA~ 


o 


00536 

R 

040024 

R 

DAC 

ERCOOE+2 



o 

00537 

R 

777775 

A 

LAW 

"3 


o 

00540 

R 

040021 

R 

DAC 

ENCODER 



00541 

R 

600152 

R 

JMP 

/ 

/ERROR #7, DATA 
/ 

ERRQR7 0 

exit + 3 



o 





NOISE ERROR, CONVERS I ON * S OUT OF SPEC, 

o 


00542 

R 

000000 

A 



o 

o 

00543 

R 

201264 

R 

LAC 

(N0ISE2 



00544 

R 

040102 

R 

PAG 

DSTSW1 

/set DISTRIBUTION SW FOR NEXT TES], 


o 

00545 

R 

777777 

A 

LAW 

-i 


o 

00546 

R 

040020 

R 

DAG 

syserh 



00547 

R 

201265 

R 

LAC 

(7 



o 

00550 

R 

040022 

R 

DAC 

ERCODE 

/ERROR CODE #7 

o 

00551 

R 

777775 

A 

LAW 

» 3 



00552 

R 

040021 

R 

PAG 

ERCOOEwl 



o 

00553 

R 

200765 

R 

LAC 

DATABUF 


o 

00554 

R 

040023 

R 

DAC 

ERCOUE+1 

/JLST CONVERSION VaUUE 


00555 

R 

221215 

R 

LAC* 

TEMPI' 




00556 

R 

040024 

R 

DAC 

ERCODE+2 

/2ND CONVERSION VAEUE 


o 

00557 

R 

600152 

R 

JMP 

EXIT+3 

o 


o 


/ 

I EJECT 


o 


o 


o 


o 


o 


o 


o 



o 
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AP15 SYSTEM EXERC X S E R TEST 


00560 R 000000 


/CHECK FOR AN ILLEGAL f WORE) COUNT* PVRFLOW FLAG, 
/ 

CKWCSF 0 


o 

0056J, 

R 

400036 

R 

XCT 

WCSF 

/is THE W,c, FLAG set? 

O 


00562 

R 

620^60 

R 

UMP# 

CKWCSF 

/NO, EXIT 



00563 

R 

777777 

A 

LAW 




o 

0056 4 

R 

041212 

R 

OAC 

FLGDRV 

/yes, set flag indicator, 

o 


00565 

R 

100467 

R 

UMS 

ERRMES 

/ERROR, ILLEGAL W.C, FLAG, 



00566 

R 

000001 

A 

1 


/ERROR CODE #1 

o 

o 





/ 







/CHECK FOR AN 
/ 

CKMSSF 0 

ILLEGAL ’MEM, 

OVRFLOWt FLAG, 


0 

00567 

R 

000000 

A 



o 


00570 

R 

400037 

R 

XCT 

MSSF 

/IS the mem, flag set? 


o 

00571 

R 

620567 

R 

UMP» 

qkmssf 

/no, EXIT 


00572 

R 

777777 

A 

LAW 

«1 


o 


00573 

R 

041212 

R 

DAC 

FLGDRV 

/yes, set flag indicator, 


o 

00574 

R 

100467 

R 

JMS 

ERRMES 

/ERROR, ILLEGAL MEM, OVRFLOW FLAG, 


00575 

R 

000002 

A 

2 


/ERROR CODE AH 

o 


/SET UP * 10 f RANDOM STATUS WORDS ON ENTRY, 
/ 


00576 

R 

000000 

A 

SETSTA 

0 



00577 

R 

041224 

R 


DAC 

SAVSTA 

/SAVE The STATUS WORD, 

00600 

R 

nr/bb 

A 


LAW 

-12 


00601 

R 

041214 

R 


DAC 

CNTR1 

/SET UP FOR 10 WORDS, 

00602 

R 

201224 

R 


LAC 

SAVSTA 


00603 

R 

061215 

R 


DAC* 

TEMPI 

/SAVE IN STATUS BUFFER, 

00604 

R 

441215 

R 


ISZ 

TEMPI 


00605 

R 

441214 

R 


JSZ 

CNTR1 


00606 

R 

600602 

R 


UMP 

* -4 


00607 

R 

620576 

R 


UMP* 

/ 

/ 

SETSTA 






/test 

/ 

/ 

FOR DATA 
/ 

0 

SW5 WHICH 

INHIBITS the ’AD15* TEST 

00610 

R 

000000 

A 

NOLDSW 



00611 

R 

750004 

A 


LAS 



00612 

R 

500010 

R 


AND 

DATASW 

/DATA SW5 

00613 

R 

741200 

A 


SNA 


/IS SWITCH SET? 

00614 

R 

620610 

R 


JMP* 

MQEDSW 

/NO, CONTINUE 

00615 

R 

200102 

R 


LAC 

USTSW1 

/YES 

00616 

R 

041221 

R 


DAC 

SAVDST 

/save Return addRss 

00617 

R 

201266 

R 


LAC 

(HOLD, 1 


00620 

R 

040102 

R 


DAC 

DSTSW1 


00621 

R 

600515 

R 


UMP 

EXITM5 

/EXIT ’*5* 

00622 

R 

201221 

R 

HOLD , 1 

LAC 

SAVDSf 


00623 

R 

040102 

R 


DAC 

USTSWi 

/RESTORE RETURN ADDRESS 

00624 

R 

600611 

R 


JMP 

HOLDSW+1 

/REeTEST SWITCH 


/ 

t E0ECT 


o 



o 


o 
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AD15 

c 

SRC 

APIS 

i SYSTEM 

EXERCI 

o 







/ 



00625 

R 


A 


SJAWRD 

, BLOCK 

140 

o 

00765 

R 


A 


oatabuf 

.BLOCK 

/ 

205 


01172 

R 

000000 

A 


stall 

f 

0 


o 

01173 

R 

441225 

R 



ISZ 

STALCT 


01174 

R 

600515 

R 



JMP 

EXITM5 


01175 

R 

201226 

R 



LAC 

DELAYS 

o 

01176 

R 

740001 

A 



C M A 



01177 

R 

041226 

R 



DAC 

DELAYS 


01200 

R 

740200 

A 



SHA 


o 

01201 

R 

601204 

R 



JMP 

i *3 


01202 

R 

777777 

A 



LAW 

*1 


01203 

R 

741000 

A 



SKP 


o 

01204 

R 

777775 

A 



LAW 

m'6 


01205 

R 

041225 

R 



DAC 

STALCT 


01206 

R 

621172 

R 



JMP* 

STALL 

o 







/ 



01207 

R 

000000 

A 


chanel 

0 



01210 

R 

000000 

A 


SAVE AC 

0 


o 

01211 

R 

000000 

A 


SAVACC 

0 



01212 

R 

000000 

A 


FLGDRV 

0 



01213 

R 

000000 

A 


WAITCT 

0 


o 

01214 

R 

000000 

A 


CNTR1 

0 



01215 

R 

000000 

A 


TEMPI 

0 



01216 

R 

000000 

A 


TEMP2 

0 


o 

01217 

R 

000000 

A 


TEMP3 

0 



01220 

R 

000000 

A 


SAVQSW 

0 



01221 

R 

000000 

A 


SAVDST 

0 


o 

01222 

R 

000000 

A 


RUNCTR 

0 



01223 

R 

000000 

A 


cntra 

0 



01224 

R 

000000 

A 


SAVSTA 

0 


o 

01225 

R 

000000 

A 


STALCT 

0 



01226 

R 

000000 

A 


DELAYS 

0 

/ 


o 



000000 

R 



, END USERSW 


01227 

R 

000103 

R 

H 





01230 

R 

000001 

A 

**L 




o 

01231, 

R 

200001 

A 

»L 





01232 

R 

000177 

A 

*L 





01233 

R 

000157 

R 

*L 




o 

01234 

R 

000764 

R 

*L 





01235 

R 

000765 

R 

H 





01236 

R 

377777 

A 

**L 




o 

01237 

R 

402200 

A 

tt L 





01240 

R 

000266 

R 

*U 





01241 

R 

000625 

R 

*L 




o 

01242 

R 

002000 

A 

«U 





01243 

R 

202001 

A 

<*L 





01244 

R 

402002 

A 





o 

01245 

R 

602003 

A 






01246 

R 

602420 

A 

*1 





/STATUS WORD LOCATIONS 

/data storage table 


/stall every other pass 
/SET UP stall 
/SET UP SKIP 


O 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 

o 


o 


o 




o 

PAGE 15 

O 01247 R 

01250 R 

01251 R 

O 01252 R 

01253 R 

01254 R 

O 01255 R 

01256 R 

01257 R 

O 01260 R 

01261 R 
_ 01262 R 

O 01263 R 

01264 R 

01265 R‘ 

O 01266 R 


o 


o 


AD15 SRC AD15 

402007 A <H, 

1020/7 A 
602005 A *1, 

002010 A 
000624 R ou 
000010 A 
000345 R 
006401 A *1 
0 003 7 7 R *1 
000005 A «L 
7777/3 A »L 
00044/ R *1 
400610 A «£, 

000445 R #L 
000007 A 
000622 R *1 

SUE = 01275 NO 


SYSTEM EXERCISER TEST 


ERROR U.NES 


o 

° 

o 

o 

o 

o 

r^\ 

o 

I 

o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 



o 


o 
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AD1R 

SRC 

AD15 

SYSTEM EXERCISER TEST 


o 

AOCF 

00034 

R 

ADC V 

00331 

R 

A DP MEM 

00345 

R 

adrb 


adrs 

00033 

R 

adsf 

00035 

R 

CA25 

00041 

R 

CA27 


CHANEL 

01207 

R 

CKMSSF 

00567 

R 

CKWCSF 

00560 

R 

cntra 

o 

CNTR1 

01214 

R 

DATABU 

00765 

R 

DATASW 

00010 

R 

DELAYS 


DSTSWl, 

00102 

R 

EBA 

707764 

A 

EEM 

707702 

A 

ERCODE 


ERRMES 

00467 

R 

ERR0R7 

00542 

R 

ERRQR8 

00526 

R 

EXIT 

G 

EXITM4 

00463 

R 

EXITM5 

00515 

R 

F'LGORV 

01212 

R 

HOLDSW 


HOLD 1 1 

00622 

R 

INI T 

00044 

R 

HSSF 

00037 

R 

noelag 


NOISE 

00377 

R 

N 0 j S E 1 

00432 

R 

N0ISE2 

00445 

R 

PGCVRT 

O 

RANTST 

00266 

R 

RANI 

00374 

R 

PPL 

705512 

A 

RUNCTR 


SAVACC 

01211 

R 

SAVDST 

01221 

R 

SAVOSW 

01220 

R 

SAVEAC 


SAVSTA 

01224 

R 

SEQTST 

00157 

R 

SERVCE 

00074 

R 

SETSTA 

o 

STAUCT 

01225 

R 

STALL 

01172 

R 

STAWRD 

0062^ 

R 

SYSERR 


tempi 

01215 

R 

TEMP2 

01216 

R 

T £ M P 3 

01217 

R 

usersw 


HA I TOT 

01213 

R 

WCSF 

00036 

R 

WC24 

00040 
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